Labels:black | darkness OCR: Point = Recard X, Y, Z : Real ; end; RPoint Record Better R Point = Case Boolean of False (X, Y, Z : Real); : True (R, theta, phi : Real); end; Recard Case UsePolar: Boolean of (X, Y, Z : Real); False True (R, theta, phi : Real); end;